home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Skunkware 98
/
Skunkware 98.iso
/
src
/
mail
/
pine3.96.tar.gz
/
pine3.96.tar
/
pine3.96
/
imap
/
ANSI
/
c-client
/
sm_vms.c
< prev
next >
Wrap
C/C++ Source or Header
|
1994-08-02
|
3KB
|
93 lines
/*
* Program: Subscription Manager (VMS based)
*
* Author: Mark Crispin
* Networks and Distributed Computing
* Computing & Communications
* University of Washington
* Administration Building, AG-44
* Seattle, WA 98195
* Internet: MRC@CAC.Washington.EDU
*
* Date: 2 August 1994
* Last Edited: 2 August 1994
*
* Copyright 1993 by the University of Washington
*
* Permission to use, copy, modify, and distribute this software and its
* documentation for any purpose and without fee is hereby granted, provided
* that the above copyright notice appears in all copies and that both the
* above copyright notice and this permission notice appear in supporting
* documentation, and that the name of the University of Washington not be
* used in advertising or publicity pertaining to distribution of the software
* without specific, written prior permission. This software is made
* available "as is", and
* THE UNIVERSITY OF WASHINGTON DISCLAIMS ALL WARRANTIES, EXPRESS OR IMPLIED,
* WITH REGARD TO THIS SOFTWARE, INCLUDING WITHOUT LIMITATION ALL IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE, AND IN
* NO EVENT SHALL THE UNIVERSITY OF WASHINGTON BE LIABLE FOR ANY SPECIAL,
* INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
* LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, TORT
* (INCLUDING NEGLIGENCE) OR STRICT LIABILITY, ARISING OUT OF OR IN CONNECTION
* WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*
*/
#include "mail.h"
#include "osdep.h"
#include <sys/file.h>
#include <sys/stat.h>
#include "misc.h"
#define SUBSCRIPTIONFILE(t) sprintf (t,"%s/.mailboxlist",myhomedir ())
/* Subscribe to mailbox
* Accepts: mailbox name
* Returns: T on success, NIL on failure
*/
long sm_subscribe (char *mailbox)
{
return NIL; /* needs to be written */
}
/* Unsubscribe from mailbox
* Accepts: mailbox name
* Returns: T on success, NIL on failure
*/
long sm_unsubscribe (char *mailbox)
{
return NIL; /* needs to be written */
}
/* Read subscription database
* Accepts: pointer to subscription database handle (handle NIL if first time)
* Returns: character string for subscription database or NIL if done
* Note - uses strtok() mechanism
*/
char *sm_read (void **sdb)
{
int fd;
char *s,*t,tmp[MAILTMPLEN];
struct stat sbuf;
if (!*sdb) { /* first time through? */
SUBSCRIPTIONFILE (tmp); /* open subscription database */
if ((fd = open (tmp,O_RDWR,NIL)) >= 0) {
fstat (fd,&sbuf); /* get file size and read data */
read (fd,s = (char *) (*sdb = fs_get (sbuf.st_size + 1)),sbuf.st_size);
close (fd); /* close file */
s[sbuf.st_size] = '\0'; /* tie off string */
if (t = strtok (s,"\n")) return t;
}
}
/* subsequent times through database */
else if (t = strtok (NIL,"\n")) return t;
fs_give (sdb); /* free database */
return NIL; /* all done */
}